home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Interactive Media Design Review 1999
/
Interactive Media Design Review 1999.iso
/
pc
/
Demos
/
Herois
/
Codigo.Cst
/
00197_Script_MM Jurassic Help
< prev
next >
Wrap
Text File
|
1999-03-19
|
514b
|
19 lines
on jurassicScroll n
set mem = the number of member "JurassicTxt1"
set altura = 0
repeat with i = 0 to 5
set h = 16 * the lineCount of member (mem+i) - 224
if n > altura + h + 224 or altura > n + 224 then
set the visibility of sprite 21 + i to false
else
set the scrollTop of member (mem+i) to n - altura
set the visibility of sprite 21 + i to true
end if
set altura = altura + h
end repeat
global gJurassicScroll
set gJurassicScroll = n
end